BannedBooks

analysis

An Analysis of the PEN America’s Index of School Book Bans from July 1, 2021 to June 30, 2022

The Data

Data Comes from PEN America’s Index of School Book Bans

Image From The State News

Show the code
books %>%
  mutate(Author = as.factor(Author), Title = as.factor(Title), `Type of Ban` = as.factor(`Type of Ban`), State = as.factor(State), District = as.factor(District), `Date of Challenge/Removal` = as.factor(`Date of Challenge/Removal`), `Origin of Challenge` = as.factor(`Origin of Challenge`)) %>%
  select(Author, Title, `Type of Ban`, State, District, `Date of Challenge/Removal`, `Origin of Challenge`) %>%
  datatable(filter= "top", options = list(pageLength = 5, autoWidth = TRUE), rownames=FALSE)
Show the code
topbooks %>%
  select(image = image_url, Title, Author, numTimesBanned) %>%
  gt()%>%
  gt_img_rows(columns = image,img_source="local", height = 50)%>%
  tab_header(title = "The Most Banned Books from July 2021 - June 2022") %>%
  cols_label(
    Title = "Book Title",
    image = "Book Cover",
    Author = "Author",
    numTimesBanned = "Total Number of Bans"
  )
The Most Banned Books from July 2021 - June 2022
Book Cover Author Total Number of Bans
Gender Queer: A Memoir
Kobabe, Maia 41
All Boys Aren't Blue
Johnson, George M. 29
Out of Darkness
Pérez, Ashley Hope 23
The Bluest Eye
Morrison, Toni 22
Lawn Boy
Evison, Jonathan 17
The Hate U Give
Thomas, Angie 17
The Absolutely True Diary of a Part-Time Indian
Alexie, Sherman 16